home *** CD-ROM | disk | FTP | other *** search
/ Aminet 22 / Aminet 22 (1997)(GTI - Schatztruhe)[!][Dec 1997].iso / Aminet / util / pack / xpk_User.lha / xpk_User / Install next >
Text File  |  1997-09-06  |  36KB  |  903 lines
  1. ; XpkMaster distribution Installer script.
  2. ; © Dirk Stöcker <stoecker@rcs.urz.tu-dresden.de>
  3. ; $VER: XpkMasterInstall 1.16 (27.08.97)
  4.  
  5. ; History:
  6. ; 1.10    changed WHAT_C
  7. ; 1.11    added russian language and install check for nederlands
  8. ; 1.12  added install check for español 
  9. ; 1.13  finally fixed Installer version error report
  10. ; 1.14  added new languages
  11. ; 1.15  added finish language
  12. ; 1.16  added question for language
  13.  
  14. ; Translations, which equal english texts are not needed, as not used texts
  15. ; get english defaults!
  16.  
  17. (set #catalog 0)
  18.  
  19. (set #i 14)
  20. (while (set #thisfile (select #i
  21.         "dansk" "deutsch" "español" "français" "italiano"
  22.         "nederlands" "norsk" "polski" "português" "russian"
  23.         "srpski" "suomi" "Svenska" "ÃeÓtina"
  24. ""))
  25.   (
  26.     (if (= @language #thisfile) (set #catalog #i))
  27.     (set #i (+ #i 1))
  28.   )
  29. )
  30.  
  31. (set #catalog
  32.   (askchoice
  33.     (prompt "Select your native language")
  34.     (help @askoptions-help)
  35.     (choices
  36.         "dansk" "deutsch" "" "français" "italiano"
  37.         "" "" "polski" "" "russian"
  38.         "srpski" "suomi" "Svenska" "ÃeÓtina"
  39.     "ENGLISH")
  40.     (default #catalog)
  41.   )
  42. )
  43.  
  44.  
  45.  
  46. ; ************************** English texts ******************************
  47.  
  48. (set #GOINGIN
  49.   (cat "\n\nWelcome to XpkMaster distribution installation system.\n\n"
  50.        "All sub archives you want to install have to be unpacked to "
  51.        "one directory. This directory is the parent of the one, you "
  52.        "have started the script of!\n\nMake clear you did this!"
  53.   )
  54. )
  55. (set #INSTALLERVERSION "You need at least version 42.9 of Installer.")
  56. (set #XPKMASTER_LIB  "Update xpkmaster.library when needed.")
  57. (set #INSTALL_LIB    "Update sub library %s.")
  58. (set #WHAT_STUFF     "What programs do you like to install ?")
  59. (set #WHAT_LANGUAGE  "What language files do you like to install?")
  60. (set #WHAT_PROMPT    "What parts of the distribution do you like to install?")
  61. (set #WHAT_LIBS      "What sub libraries do you like to install?")
  62. (set #WHAT_DOCS      "\n\n\n\n\nInstall documentation?")
  63. (set #WHAT_PREFS     "\n\n\n\n\nInstall Preferences program?")
  64. (set #WHAT_PROCESSOR "\n\n\n\n\nInstall MC68020 versions of some libraries?")
  65. (set #WHAT_DEVEL     "What parts of developer dir do you need?")
  66. (set #WHAT_C
  67.   (cat "Choose the parts you need for your C compiler. The files are "
  68.         "automatically copied into correct sub directories."
  69.   )
  70. )
  71. (set #CRYPT_SOURCE   "\n\n\n\n\nInstall cryption lib sources?")
  72. (set #STARTUP         "\n\n\n\n\nAdd XpkMasterPrefs call to startup file.")
  73. (set #PREFSFILE         "\n\n\n\n\nInstall preferences file?")
  74. (set #ASK_PATH
  75.   (cat "Select the path where %s should be installed. A drawer "
  76.        "»%s« will be created automatically, when not existing."
  77.   )
  78. )
  79. (set #ASK_PATH2     "Select the path where %s should be installed.")
  80. (set #WHAT_USER     "User part")
  81. (set #WHAT_DEVELOP  "Developer part")
  82. (set #WHAT_CRYPT    "cryption libraries")
  83. (set #WHAT_SOURCE   "sources and examples")
  84. (set #DEV_AUTODOCS  "Autodocs")
  85. (set #DEV_HOTHELP   "HotHelp files")
  86. (set #DEV_FD        "FD files")
  87. (set #DEV_ASM        "ASM includes")
  88. (set #DEV_C        "C/C++ includes")
  89. (set #DEVT_AUTODOCS "the autodocs")
  90. (set #DEVT_FD_FILES "the FD files")
  91. (set #DEVT_ASM      "the ASM includes")
  92. (set #DEVT_C        "the C/C++ includes")
  93. (set #DEVT_HOTHELP  "the HotHelp files")
  94. (set #CRP_SOURCES   "the sources")
  95. (set #SRC_SRC_A_EXA "the sources and examples")
  96. (set #DEVC_PRAGMA   "pragma files")
  97. (set #DEVC_GCC      "GCC inline files")
  98. (set #DEVC_REDIRECT "redirect files for older code")
  99. (set #DEVC_SAS      "SAS pragmas redirect (not needed)")
  100. (set #DEVC_PROTO    "proto files")
  101.  
  102. ; **************************** Danish texts *****************************
  103.  
  104. (if (= #catalog 0) (
  105. (set #GOINGIN
  106.   (cat "\n\nVelkommen til XpkMaster distribution installations-systemet.\n\n"
  107.        "Alle sub-arkiver du vil installere skal udpakkes til en skuffe. "
  108.        "Denne skuffe er forældre til den du har startet dette script fra! "
  109.        "\n\nVær sikker på du har gjort dette!"
  110.   )
  111. )
  112. (set #XPKMASTER_LIB  "Opdatere xpkmaster.library når nødvendigt.")
  113. (set #INSTALL_LIB    "Opdatere sub-bibliotek %s.")
  114. (set #WHAT_STUFF     "Hvilke programmer vil du gerne installere?")
  115. (set #WHAT_LANGUAGE  "Hvilke sprog filer vil du gerne installere?")
  116. (set #WHAT_PROCESSOR "\n\n\n\n\nInstallere MC68020-versioner af nogle af bibliotekerne?")
  117. (set #CRYPT_SOURCE   "\n\n\n\n\nInstallere krypteringsbiblioteks kildekode?")
  118. (set #STARTUP     "\n\n\n\n\nTilføj XpkMasterPrefs kald til opstartsfil.")
  119. (set #WHAT_C
  120.   (cat "Vælg stien hvor %s skal installeres. En skuffe "
  121.        "»%s« vil blive oprettet automatisk, hvis den ikke eksisterer."
  122.   )
  123. )
  124. (set #WHAT_USER     "Brugerdel")
  125. (set #WHAT_DEVELOP  "Udviklerdel")
  126. (set #WHAT_CRYPT    "Krypterings-biblioteker")
  127. (set #DEV_HOTHELP   "HotHelp-filer")
  128. ))
  129. ; ************************** German texts *******************************
  130.  
  131. (if (= #catalog 1) (
  132. (set #GOINGIN
  133.   (cat "\n\nWillkommen zum XpkMaster Installationssystem.\n\n"
  134.        "Alle Teilarchive, die Sie installieren wollen, müssen in ein "
  135.        "Verzeichnis entpackt werden. Dieses ist das vorhergehende "
  136.        "Verzeichnis zu dem, aus dem Sie dieses Script gestartet haben.\n\n"
  137.        "Stellen Sie sicher, das richtig getan zu haben!"
  138.   )
  139. )
  140. (set #INSTALLERVERSION "Sie benötigen mindestens Version 42.9 des Installer Programmes.")
  141. (set #XPKMASTER_LIB  "Erneuere xpkmaster.library wenn nötig.")
  142. (set #INSTALL_LIB    "Erneuere Sublibrary %s.")
  143. (set #WHAT_STUFF     "Welche Programme wollen Sie installieren?")
  144. (set #WHAT_LANGUAGE  "Welche Sprachkataloge wollen Sie installieren?")
  145. (set #WHAT_PROMPT    "Welche Teile von XPK wollen Sie installieren?")
  146. (set #WHAT_LIBS      "Welche Sublibraries wollen Sie installieren?")
  147. (set #WHAT_DOCS      "\n\n\n\n\nDokumentation installieren?")
  148. (set #WHAT_PREFS     "\n\n\n\n\nVoreinsteller (Preferences) Programm installieren?")
  149. (set #WHAT_PROCESSOR "\n\n\n\n\nMC68020 Versionen einiger Libraries installieren?")
  150. (set #WHAT_DEVEL     "Welche Teile des Entwickler Pakets benötigen Sie?")
  151. (set #WHAT_C
  152.   (cat "Wählen Sie die Teile, die Sie für Ihren C Compiler benötigen. Die"
  153.        "Dateien werden automatisch in die nötigen Unterverzeichnisse verteilt."
  154.   )
  155. )
  156. (set #CRYPT_SOURCE   "\n\n\n\n\nQuellkode der Verschlüsselungslibraries installieren?")
  157. (set #STARTUP         "\n\n\n\n\nErgänze XpkMasterPrefs Programmaufruf zur Startupdatei.")
  158. (set #PREFSFILE         "\n\n\n\n\nInstalliere Voreinsteller (Preferences) Datei?")
  159. (set #ASK_PATH
  160.   (cat "Wählen Sie den Pfad, wo %s installiert werden soll. Ein Verzeichnis "
  161.        "»%s« wird automatisch erstellt, falls es noch nicht existiert."
  162.   )
  163. )
  164. (set #ASK_PATH2     "Wählen Sie den Pfad, wo %s installiert werden soll.")
  165. (set #WHAT_USER     "Anwender Archiv")
  166. (set #WHAT_DEVELOP  "Entwickler Archiv")
  167. (set #WHAT_CRYPT    "Verschlüsselungslibraries")
  168. (set #WHAT_SOURCE   "Quellkodes und Beispiele")
  169. (set #DEV_HOTHELP   "HotHelp-Dateien")
  170. (set #DEV_FD        "FD-Dateien")
  171. (set #DEV_ASM        "ASM Includes")
  172. (set #DEV_C        "C/C++ Includes")
  173. (set #DEVT_AUTODOCS "die Autodocs")
  174. (set #DEVT_FD_FILES "die FD-Dateien")
  175. (set #DEVT_ASM      "die ASM Includes")
  176. (set #DEVT_C        "die C/C++ Includes")
  177. (set #DEVT_HOTHELP  "die HotHelp-Dateien")
  178. (set #CRP_SOURCES   "die Quellkodes")
  179. (set #SRC_SRC_A_EXA "die Quellkodes und Beispiele")
  180. (set #DEVC_PRAGMA   "pragma Dateien")
  181. (set #DEVC_GCC      "GCC inline Dateien")
  182. (set #DEVC_REDIRECT "Umleitungsdateien für älteren Kode")
  183. (set #DEVC_SAS      "SAS pragmas Umleitungsdateien (nicht benötigt)")
  184. (set #DEVC_PROTO    "proto Dateien")
  185. ))
  186.  
  187. ; ************************** French texts *******************************
  188.  
  189. (if (= #catalog 3) (
  190. (set #GOINGIN
  191.   (cat "\n\nBienvenue dans le système d'installation de xpkMaster.\n\n"
  192.        "Toutes les sous archives que vous voulez installer doivent être "
  193.        "décompressées dans un répertoire. Ce répertoire est le parent de "
  194.        "celui duquel vous avez lancé ce script !\n\n"
  195.        "Assurez vous que vous ayez fait cela !"
  196.   )
  197. )
  198. (set #INSTALLERVERSION "Vous avez besoin de Installer version 42.9 au minimum.")
  199. (set #XPKMASTER_LIB  "Mise à jour de xpkmaster.library lorsque c'est nécessaire.")
  200. (set #INSTALL_LIB    "Mise à jour de la sous bibliothèque %s.")
  201. (set #WHAT_STUFF     "Quels programmes voulez vous installer ?")
  202. (set #WHAT_LANGUAGE  "Quelles fichiers de langue voulez vous installer ?")
  203. (set #WHAT_PROMPT    "Quelles parties de la distribution voulez vous installer ?")
  204. (set #WHAT_LIBS      "Quelles sous bibliothèques voulez vous installer ?")
  205. (set #WHAT_DOCS      "\n\n\n\n\nInstaller la documentation ?")
  206. (set #WHAT_PREFS     "\n\n\n\n\nInstaller le programme de préférences ?")
  207. (set #WHAT_PROCESSOR "\n\n\n\n\nInstaller la version MC68020 de quelques bibliothèques ?")
  208. (set #WHAT_DEVEL     "Quelles parties du répertoire développeur voulez vous ?")
  209. (set #WHAT_C         "Choisissez les parties nécessaires pour votre compilateur C.")
  210. (set #CRYPT_SOURCE   "\n\n\n\n\nInstaller les sources des bibliothèques de cryptage ?")
  211. (set #STARTUP         "\n\n\n\n\nAjouter l'appel XpkMasterPrefs au fichier de démarrage.")
  212. (set #ASK_PATH
  213.   (cat "Sélectionnez le chemin où %s devrait être installé. Un répertoire "
  214.        "« %s » sera créé automatiquement, s'il n'existe pas."
  215.   )
  216. )
  217. (set #ASK_PATH2     "Sélectionner le chemin où %s devrai(en)t être installé.")
  218. (set #WHAT_USER     "Partie utilisateur")
  219. (set #WHAT_DEVELOP  "Partie développeur")
  220. (set #WHAT_CRYPT    "Bibliothèques de cryptage")
  221. (set #WHAT_SOURCE   "Sources et exemples")
  222. (set #DEV_HOTHELP   "Fichiers HotHelp")
  223. (set #DEV_FD        "Fichiers FD")
  224. (set #DEV_ASM        "Includes ASM")
  225. (set #DEV_C        "Includes C/C++")
  226. (set #DEVT_AUTODOCS "les autodocs")
  227. (set #DEVT_FD_FILES "les fichiers fd")
  228. (set #DEVT_ASM      "les includes ASM")
  229. (set #DEVT_C        "les includes C/C++")
  230. (set #DEVT_HOTHELP  "les fichiers HotHelp")
  231. (set #CRP_SOURCES   "les sources")
  232. (set #SRC_SRC_A_EXA "les sources et exemples")
  233. (set #DEVC_PRAGMA   "les fichiers pragma")
  234. (set #DEVC_GCC      "les fichiers inline GCC")
  235. (set #DEVC_REDIRECT "les fichiers de redirection pour le code plus ancien")
  236. (set #DEVC_SAS      "les pragmas de redirection SAS (pas nécessaire)")
  237. (set #DEVC_PROTO    "fichiers proto")
  238. ))
  239.  
  240. ; ************************** Italiano texts *****************************
  241.  
  242. (if (= #catalog 4) (
  243. (set #GOINGIN
  244.   (cat "\n\nBenvenuto nel sistema di installazione della distribuzione XpkMaster.\n\n"
  245.        "Tutti i sotto archivi che desideri installare devono essere decompressi in"
  246.        "una cartella. Questa cartella è la precedente a quella da cui tu hai fatto"
  247.        "partire questo script!\n\nAssicurati di averlo fatto!"
  248.   )
  249. )
  250. (set #INSTALLERVERSION "Necessiti come minimo della versione 42.9 dell' Installer.")
  251. (set #XPKMASTER_LIB  "Aggiorna l' xpkmaster.library quando necessario.")
  252. (set #INSTALL_LIB    "Aggiorna la sotto libreria %s.")
  253. (set #WHAT_STUFF     "Che programmi desideri installare ?")
  254. (set #WHAT_LANGUAGE  "Che file di linguaggio desideri installare?")
  255. (set #WHAT_PROMPT    "Che parti della distribuzione desideri installare?")
  256. (set #WHAT_LIBS      "Che sotto-librerie desideri installare?")
  257. (set #WHAT_DOCS      "\n\n\n\n\nInstallo la documentazione?")
  258. (set #WHAT_PREFS     "\n\n\n\n\nInstallo il programma di Preferenze ?")
  259. (set #WHAT_PROCESSOR "\n\n\n\n\nInstallo le versioni MC68020 di alcune librerie?")
  260. (set #WHAT_DEVEL     "Di che parti della cartella per sviluppatore hai bisogno?")
  261. (set #WHAT_C     "Scegli le parti che ti servono per il tuo compilatore C.")
  262. (set #CRYPT_SOURCE   "\n\n\n\n\nInstallo i sorgenti della libreria di crittografia?")
  263. (set #STARTUP         "\n\n\n\n\nAggiungo la chiamata a XpkMasterPrefs nel file di startup.")
  264. (set #ASK_PATH
  265.   (cat "Seleziona il percorso in cui %s dovra' essere installato. Un cassetto "
  266.        "»%s« verra' creato automaticamente, se non esiste gia'."
  267.   )
  268. )
  269. (set #ASK_PATH2     "Seleziona il percorso in cui %s dovra' essere installato.")
  270. (set #WHAT_USER     "Parte Utente")
  271. (set #WHAT_DEVELOP  "Parte Sviluppatore")
  272. (set #WHAT_CRYPT    "Librerie di crittografia")
  273. (set #WHAT_SOURCE   "sorgenti ed esempi")
  274. (set #DEV_HOTHELP   "File di Aiuto in linea")
  275. (set #DEVT_AUTODOCS "gli autodocs")
  276. (set #DEVT_FD_FILES "i file fd")
  277. (set #DEVT_ASM      "gli includes ASM")
  278. (set #DEVT_C    "gli includes C/C++")
  279. (set #DEVT_HOTHELP  "I file di Aiuto in linea")
  280. (set #CRP_SOURCES   "I sorgenti")
  281. (set #SRC_SRC_A_EXA "i sorgenti e gli esempi")
  282. (set #DEVC_PRAGMA   "I file pragma")
  283. (set #DEVC_REDIRECT "redirigo i file per il vecchio codice")
  284. (set #DEVC_SAS      "redirigo i SAS pragmas (non necessario)")
  285. ))
  286.  
  287. ; **************************** Polish texts *****************************
  288.  
  289. (if (= #catalog 7) (
  290. (set #GOINGIN
  291.   (cat "\n\nWitaj w programie instalacyjnym pakietu XpkMaster.\n\n"
  292.        "Wszystkie pod-archiwa, których zawartoôê bëdziesz chciaî zainstalowaê "
  293.        "muszâ byê rozpakowane do jednego katalogu. Katalogiem tym powinien "
  294.        "byê katalog nadrzëdny do tego z którego uruchomiîeô ten skrypt instalacyjny!\n\n"
  295.        "Upewnij sië, ûe tak to wîaônie zrobiîeô!"
  296.   )
  297. )
  298. (set #INSTALLERVERSION "Ten skrypt wymaga Installlera w wersji 42.9 lub nowszego.")
  299. (set #XPKMASTER_LIB  "Zaktualizuj xpkmaster.library w razie potrzeby.")
  300. (set #INSTALL_LIB    "Zaktualizuj pob-bibliotekë %s.")
  301. (set #WHAT_STUFF     "Które programy chcesz zainstalowaê?")
  302. (set #WHAT_LANGUAGE  "Które wersje jëzykowe chcesz zainstalowaê?")
  303. (set #WHAT_PROMPT    "Które czëôci dystrybucji chcesz zainstalowaê?")
  304. (set #WHAT_LIBS      "Które pod-biblioteki chcesz zainstalowaê?")
  305. (set #WHAT_DOCS      "\n\n\n\n\nCzy chcesz zainstalowaê dokumentacjë?")
  306. (set #WHAT_PREFS     "\n\n\n\n\nCzy chcesz zainstalowaê panel preferencji?")
  307. (set #WHAT_PROCESSOR "\n\n\n\n\nCzy chcesz zainstalowaê biblioteki w wersji dla procesora MC68020 lub nowszych?")
  308. (set #WHAT_DEVEL     "Które czëôci z pakietu dla programistów bëdâ Ci potrzebne?")
  309. (set #WHAT_C         "Wybierz te elementy, które bëdziesz potrzebowaî przy pracy z Twoim kompilatorem C.")
  310. (set #CRYPT_SOURCE   "\n\n\n\n\nCzy chcesz zainstalowaê tekst úródîowy biblioteki szyfrujâcej?")
  311. (set #STARTUP         "\n\n\n\n\nDodaje wywoîanie programu XpkMasterPrefs do sekwencji startowej.")
  312. (set #ASK_PATH
  313.   (cat "Wskaû, gdzie chcesz zainstalowaê %s. Katalog "
  314.        "»%s« zostanie zaîoûony automatycznie, jeôli jeszcze nie istnieje."
  315.   )
  316. )
  317. (set #ASK_PATH2     "Wskaû, gdzie chcesz zainstalowaê %s.")
  318. (set #WHAT_USER     "Pliki dla uûytkownika")
  319. (set #WHAT_DEVELOP  "Pliki dla programisty")
  320. (set #WHAT_CRYPT    "biblioteki szyfrujâce")
  321. (set #WHAT_SOURCE   "teksty úródîowe i przykîady")
  322. (set #DEV_AUTODOCS  "dokumentacjë (Autodocs)")
  323. (set #DEV_HOTHELP   "pliki dla systemu HotHelp")
  324. (set #DEV_FD        "pliki FD")
  325. (set #DEV_ASM        "inkludy dla asemblera")
  326. (set #DEV_C        "inkludy dla C/C++")
  327. (set #DEVT_AUTODOCS "dokumentacjë (AutoDocs)")
  328. (set #DEVT_FD_FILES "pliki FD")
  329. (set #DEVT_ASM      "inkludy dla asemblera")
  330. (set #DEVT_C        "inkludy dla C/C++")
  331. (set #DEVT_HOTHELP  "pliki dla systemu HotHelp")
  332. (set #CRP_SOURCES   "teksty úródîowe")
  333. (set #SRC_SRC_A_EXA "teksty úródîowe i przykîady")
  334. (set #DEVC_PRAGMA   "pliki pragma")
  335. (set #DEVC_GCC      "pliki inline dla GCC")
  336. (set #DEVC_REDIRECT "pliki poôrednie (redirect) dla starszych úródeî")
  337. (set #DEVC_SAS      "pliki poôrednie dla pragm kompilatora SAS (nie sâ potrzebne)")
  338. (set #DEVC_PROTO    "pliki proto")
  339. ))
  340.  
  341. ; **************************** Russian texts ****************************
  342.  
  343. (if (= #catalog 9) (
  344. (set #GOINGIN
  345.   (cat "\n\nÃíàïí îíåaêíáañû á çìðñaêêþñíï ãçðñïçàòñçáìíâí îaéäña XpkMaster.\n\n"
  346.        "Áðä ðòà-aïôçáú, ìäíàôíãçëúä Áaë ãêþ çìðñaêêþõçç, ìa ìaöaêí çìðñaêêþõçç "
  347.        "òåä ãíêåìú àúñû ïaðîaéíáaìú á íãçì éañaêíâ. Üñíñ éañaêíâ þáêþäñðþ îïäãúãòùçë "
  348.        "éañaêíâíë íñ ñíâí, çæ éíñíïíâú Áú æaîòðñçêç çìðñaêêþñíï.\n\nÒàäãçñäðû á üñíë!"
  349.   )
  350. )
  351. (set #INSTALLERVERSION "Ìäíàôíãçë Çìðñaêêþñíï éaé ëçìçëòë áäïðçç 42.9.")
  352. (set #XPKMASTER_LIB  "Íàìíáêäìçä xpkmaster.library îïç ìäíàôíãçëíðñç.")
  353. (set #INSTALL_LIB    "Íàìíáêäìçä àçàêçíñäéç îíããäïåéç %s.")
  354. (set #WHAT_STUFF     "Éaéçä îïíâïaëëú Áú ôíñçñä îïíçìðñaêêçïíáañû?")
  355. (set #WHAT_LANGUAGE  "Éaéçä þæúéíáúä óaèêú Áú ôíñçñä îïíçìðñaêêçïíáañû?")
  356. (set #WHAT_PROMPT    "Éaéçä öaðñç îaéäña Áú ôíñçñä îïíçìðñaêêçïíáañû?")
  357. (set #WHAT_LIBS      "Éaéçä àçàêçíñäéç îíããäïåéç Áú ôíñçñä îïíçìðñaêêçïíáañû?")
  358. (set #WHAT_DOCS      "\n\n\n\n\nÇìðñaêêçïíáañû ãíéòëäìñaõçý?")
  359. (set #WHAT_PREFS     "\n\n\n\n\nÇìðñaêêçïíáañû îïíâïaëëò Îïäãòðñaìíáíé?")
  360. (set #WHAT_PROCESSOR "\n\n\n\n\nÇìðñaêêçïíáañû ìäéíñíïúä àçàêçíñäéç îíã MC68020?")
  361. (set #WHAT_DEVEL     "Éaéçä öaðñç ãíéòëäìñaõçç ãêþ îïíâïaëëçðña Áaë ìòåìú?")
  362. (set #WHAT_C
  363.   (cat "Òéaåçñä öaðñç, ìäíàôíãçëúä Áaøäëò éíëîçêþñíïò Ðç. Óaèêú aáñíëañçöäðéç "
  364.         "àòãòñ ïaæëäùäìú á ìòåìúô éañaêíâaô."
  365.   )
  366. )
  367. (set #CRYPT_SOURCE   "\n\n\n\n\nÇìðñaêêçïíáañû çðôíãìçéç øçóïòýùäè àçàêçíñäéç?")
  368. (set #STARTUP      "\n\n\n\n\nÃíàaáêþý áúæíá XpkMasterPrefs á startup-óaèêä.")
  369. (set #PREFSFILE      "\n\n\n\n\nÇìðñaêêçïíáañû óaèê îïäãòðñaìíáíé?")
  370. (set #ASK_PATH
  371.   (cat "Òéaåçñä ëaïøïòñ ãêþ çìðñaêêþõçç %s. Îïç íñðòñðñáçç "
  372.        "éañaêíâa »%s«, íì àòãäñ ðíæãaì aáñíëañçöäðéç."
  373.   )
  374. )
  375. (set #ASK_PATH2     "Òéaåçñä ëaïøïòñ ãêþ çìðñaêêþõçç %s.")
  376. (set #WHAT_USER     "Ëaïøïòñ îíêûæíáañäêþ")
  377. (set #WHAT_DEVELOP  "Ëaïøïòñ îïíâïaëëçðña")
  378. (set #WHAT_CRYPT    "àçàêçíñäéç øçóïíáéç")
  379. (set #WHAT_SOURCE   "çðôíãìçéç ç îïçëäïú")
  380. (set #DEV_AUTODOCS  "Óaèêú Autodocs")
  381. (set #DEV_HOTHELP   "Óaèêú HotHelp")
  382. (set #DEV_FD        "Óaèêú FD")
  383. (set #DEV_ASM       "ASM includes")
  384. (set #DEV_C         "C/C++ includes")
  385. (set #DEVT_AUTODOCS "óaèêú autodocs")
  386. (set #DEVT_FD_FILES "óaèêú FD")
  387. (set #DEVT_ASM      "óaèêú ASM includes")
  388. (set #DEVT_C        "óaèêú C/C++ includes")
  389. (set #DEVT_HOTHELP  "óaèêú HotHelp")
  390. (set #CRP_SOURCES   "çðôíãìçéç")
  391. (set #SRC_SRC_A_EXA "çðôíãìçéç ç îïçëäïú")
  392. (set #DEVC_PRAGMA   "óaèêú pragma")
  393. (set #DEVC_GCC      "óaèêú GCC inline")
  394. (set #DEVC_REDIRECT "îäïäìaîïaáêþýùçä óaèêú ãêþ ðñaïúô éíãíá")
  395. (set #DEVC_SAS      "Îïaâëú îäïäìaîïaáêäìçþ SAS (áíæëíåìí ìä ìòåìú)")
  396. (set #DEVC_PROTO    "Óaèêú proto")
  397. ))
  398.  
  399. ; ************************** Serbian texts ******************************
  400.  
  401. (if (= #catalog 10) (
  402. (set #GOINGIN
  403.   (cat "\n\nDobrodoãli u instalacioni sistem XpkMaster paketa.\n\n"
  404.        "Sve dodatne arhive treba da se raspakuju u jedan direktorijum. "
  405.        "To je direkorijum prethodan onome iz koga se starovali "
  406.        "instalaciju!\n\n"
  407.        "Obavezno uradite to!"
  408.   )
  409. )
  410. (set #INSTALLERVERSION "Treba Vam najmanje verzija 42.9 Instalera.")
  411. (set #XPKMASTER_LIB  "Osveäi xpkmaster.library kada je porebno.")
  412. (set #INSTALL_LIB    "Osveäi podbiblioteke %s.")
  413. (set #WHAT_STUFF     "Koje programe äelite da instalirate?")
  414. (set #WHAT_LANGUAGE  "Koje jeziàke fajlove äelite da instalirate?")
  415. (set #WHAT_PROMPT    "Koje delove paketa äelite da instalirate?")
  416. (set #WHAT_LIBS      "Koje pod biblioteke äelite da instalirate?")
  417. (set #WHAT_DOCS      "\n\n\n\n\nDa li da instaliram dokumentaciju?")
  418. (set #WHAT_PREFS     "\n\n\n\n\nDa li da instaliram program za podeãavanja?")
  419. (set #WHAT_PROCESSOR "\n\n\n\n\nDa li da instaliram MC68020 verzije nekih biblioteka?")
  420. (set #WHAT_DEVEL     "Koji delovi direktorijuma za programere Vam trebaju?")
  421. (set #WHAT_C         "Odaberite delove koji Vam trebaju za C kompajler.")
  422. (set #CRYPT_SOURCE   "\n\n\n\n\nDa li da instaliram izvorni kod biblioteka za ãifrovanje?")
  423. (set #STARTUP         "\n\n\n\n\nDa li da dodam poziv XpkMasterPrefs-u u startap.")
  424. (set #ASK_PATH
  425.   (cat "Odaberite putanju gde %s treba da se instalira. Direktorijum "
  426.        "»%s« áe automatski biti napravljen, ako ne postoji."
  427.   )
  428. )
  429. (set #ASK_PATH2     "Odaberite putanju gde %s treba da se instalira.")
  430. (set #WHAT_USER     "Korisniàki deo")
  431. (set #WHAT_DEVELOP  "Programerski deo")
  432. (set #WHAT_CRYPT    "biblioteke za ãifrovanje")
  433. (set #WHAT_SOURCE   "izvorni kod i primeri")
  434. (set #DEV_AUTODOCS  "Autodokovi")
  435. (set #DEV_HOTHELP   "HotHelp fajlovi")
  436. (set #DEV_FD        "FD fajlovi")
  437. (set #DEV_ASM        "ASM include-ovi")
  438. (set #DEV_C        "C/C++ include-ovi")
  439. (set #DEVT_AUTODOCS "autodokove")
  440. (set #DEVT_FD_FILES "fd fajlove")
  441. (set #DEVT_ASM      "ASM include-ove")
  442. (set #DEVT_C        "C/C++ include-ove")
  443. (set #DEVT_HOTHELP  "HotHelp fajlove")
  444. (set #CRP_SOURCES   "izvorni kod")
  445. (set #SRC_SRC_A_EXA "izvorni kod i primere")
  446. (set #DEVC_PRAGMA   "pragma fajlove")
  447. (set #DEVC_GCC      "GCC inline fajlove")
  448. (set #DEVC_REDIRECT "redirekt fajlove za stariji kod")
  449. (set #DEVC_SAS      "SAS pragma redirekt (nije potrebno)")
  450. (set #DEVC_PROTO    "proto fajlove")
  451. ))
  452.  
  453. ; ************************** Finnish texts ******************************
  454.  
  455. (if (= #catalog 11) (
  456. (set #GOINGIN
  457.   (cat "\n\nTervetuloa asentamaan XpkMaster järjestelmääsi.\n\n"
  458.        "Kaikki ohjelmistoon kuuluvat arkistot, jotka haluat asentaa, täytyy purkaa "
  459.        "samaan hakemistoon. Kyseinen hakemisto on sen hakemiston edeltäjä, josta "
  460.        "käynnistit tämän asennusohjelman!\n\nVarmista tehneesi näin!"
  461.   )
  462. )
  463. (set #INSTALLERVERSION "Tarvitset vähintään version 42.9 Installer-ohjelmasta.")
  464. (set #XPKMASTER_LIB  "Päivitä xpkmaster.library tarvittaessa.")
  465. (set #INSTALL_LIB    "Päivitä alikirjasto %s.")
  466. (set #WHAT_STUFF     "Mitkä ohjelmat haluaisit asentaa?")
  467. (set #WHAT_LANGUAGE  "Mitkä kielitiedostot haluaisit asentaa?")
  468. (set #WHAT_PROMPT    "Mitkä osat ohjelmistosta haluaisit asentaa?")
  469. (set #WHAT_LIBS      "Mitkä alikirjastot haluaisit asentaa?")
  470. (set #WHAT_DOCS      "\n\n\n\n\nAsennetaanko dokumentit?")
  471. (set #WHAT_PREFS     "\n\n\n\n\nAsennetaanko asetusohjelma?")
  472. (set #WHAT_PROCESSOR "\n\n\n\n\nAsennetaanko MC68020-versiot eräistä kirjastoista?")
  473. (set #WHAT_DEVEL     "Mitä osia tarvitset ohjelmoijan materiaalista?")
  474. (set #WHAT_C
  475.   (cat "Valitse osat, joita tarvitset C-kääntäjääsi varten. Tiedostot kopioidaan "
  476.         "automaattisesti oikeisiin alihakemistoihin."
  477.   )
  478. )
  479. (set #CRYPT_SOURCE   "\n\n\n\n\nAsennetaanko salauskirjastojen lähdekoodit?")
  480. (set #STARTUP         "\n\n\n\n\nLisää XpkMasterPrefs käynnistystiedostoon?")
  481. (set #PREFSFILE         "\n\n\n\n\nAsennetaanko asetustiedosto?")
  482. (set #ASK_PATH
  483.   (cat "Valitse, mihin %s tulisi asentaa. Hakemisto nimeltä "
  484.        "»%s« luodaan automaattisesti, mikäli se ei ole olemassa."
  485.   )
  486. )
  487. (set #ASK_PATH2     "Valitse, mihin %s tulisi asentaa.")
  488. (set #WHAT_USER     "Käyttäjän materiaali")
  489. (set #WHAT_DEVELOP  "Ohjelmoijan materiaali")
  490. (set #WHAT_CRYPT    "salauskirjastot")
  491. (set #WHAT_SOURCE   "lähdekoodit ja esimerkit")
  492. (set #DEV_AUTODOCS  "Autodocit")
  493. (set #DEV_HOTHELP   "HotHelp-tiedostot")
  494. (set #DEV_FD        "FD-tiedostot")
  495. (set #DEV_ASM        "ASM-includet")
  496. (set #DEV_C        "C/C++ -includet")
  497. (set #DEVT_AUTODOCS "autodocit")
  498. (set #DEVT_FD_FILES "FD-tiedostot")
  499. (set #DEVT_ASM      "ASM-includet")
  500. (set #DEVT_C        "C/C++ -includet")
  501. (set #DEVT_HOTHELP  "HotHelp-tiedostot")
  502. (set #CRP_SOURCES   "lähdekoodit")
  503. (set #SRC_SRC_A_EXA "lähdekoodit ja esimerkit")
  504. (set #DEVC_PRAGMA   "pragma-tiedostot")
  505. (set #DEVC_GCC      "GCC inline -tiedostot")
  506. (set #DEVC_REDIRECT "uudelleenohjaustiedostot vanhalle koodille")
  507. (set #DEVC_SAS      "SAS pragmojen uudelleenohjaus (ei tarvita)")
  508. (set #DEVC_PROTO    "proto-tiedostot")
  509. ))
  510.  
  511. ; **************************** Swedish texts ****************************
  512.  
  513. (if (= #catalog 12) (
  514. (set #GOINGIN
  515.   (cat "\n\nVälkommen till XpkMaster-distributionens installationssystem.\n\n"
  516.        "Alla underarkiv du vill installera måste vara uppackade i "
  517.        "en låda. Denna låda är moderlådan till den låda där du "
  518.        "har startat detta skript!\n\nSe till att du har gjort det!"
  519.   )
  520. )
  521. (set #INSTALLERVERSION "Du behöver åtminstone version 42.9 av Installer.")
  522. (set #XPKMASTER_LIB  "Uppdatera xpkmaster.library om det behövs.")
  523. (set #INSTALL_LIB    "Uppdatera underbiblioteket %s.")
  524. (set #WHAT_STUFF     "Vilka program vill du installera?")
  525. (set #WHAT_LANGUAGE  "Vilka språkfiler vill du installera?")
  526. (set #WHAT_PROMPT    "Vilka delar av distributionen vill du installera?")
  527. (set #WHAT_LIBS      "Vilka underbibliotek vill du installera?")
  528. (set #WHAT_DOCS      "\n\n\n\n\nInstallera dokumentation?")
  529. (set #WHAT_PREFS     "\n\n\n\n\nInstallera inställningsprogram?")
  530. (set #WHAT_PROCESSOR "\n\n\n\n\nInstallera MC68020-versioner av några bibliotek?")
  531. (set #WHAT_DEVEL     "Vilka delar av utvecklarlådan behöver du?")
  532. (set #WHAT_C
  533.   (cat "Välj de delar som du behöver för din C-kompilator. Filerna "
  534.         "kopieras automatiskt till de rätta underlådorna."
  535.   )
  536. )
  537. (set #CRYPT_SOURCE   "\n\n\n\n\nInstallera krypteringslib-källkod?")
  538. (set #STARTUP     "\n\n\n\n\nLägg till XpkMasterPrefs till startfilen?")
  539. (set #PREFSFILE     "\n\n\n\n\nInstallera inställningsfilen?")
  540. (set #ASK_PATH
  541.   (cat "Välj sökväg där %s ska installeras. En låda "
  542.        "»%s« kommer att skapas automatiskt om den inte finns."
  543.   )
  544. )
  545. (set #ASK_PATH2     "Välj sökväg där %s ska installeras.")
  546. (set #WHAT_USER     "Användardel")
  547. (set #WHAT_DEVELOP  "Utvecklardel")
  548. (set #WHAT_CRYPT    "krypteringsbibliotek")
  549. (set #WHAT_SOURCE   "källkoder och exempel")
  550. (set #DEV_HOTHELP   "HotHelp-filer")
  551. (set #DEV_FD        "FD-filer")
  552. (set #DEV_ASM       "ASM include-filer")
  553. (set #DEV_C         "C/C++ include-filer")
  554. (set #DEVT_AUTODOCS "autodocs-filerna")
  555. (set #DEVT_FD_FILES "FD-filerna")
  556. (set #DEVT_ASM      "ASM include-filerna")
  557. (set #DEVT_C        "C/C++ include-filerna")
  558. (set #DEVT_HOTHELP  "HotHelp-filerna")
  559. (set #CRP_SOURCES   "källkoderna")
  560. (set #SRC_SRC_A_EXA "källkoderna och exempel")
  561. (set #DEVC_PRAGMA   "pragma-filer")
  562. (set #DEVC_GCC      "GCC inline-filer")
  563. (set #DEVC_REDIRECT "omdirigeringsfiler för gammal kod")
  564. (set #DEVC_SAS      "SAS pragmas omdirigering (ej nödvändig)")
  565. (set #DEVC_PROTO    "proto-filer")
  566. ))
  567.  
  568. ; ***************************** Czech texts *****************************
  569.  
  570. (if (= #catalog 13) (
  571. (set #GOINGIN
  572.   (cat "\n\nVÉtejte pÒi instalaci syst×mu XpkMaster.\n\n"
  573.        "VÓechny podpÊrn× archÉvy, kter× chcete nainstalovat musÉ bÙt "
  574.        "rozbaleny do jednoho adresÁÒe. Tento adresÁÒ je o jeden vÙÓe "
  575.        "neÚ ten, ze kter×ho jste spustili instalaÃnÉ skript!\n\n"
  576.        "UjistÅte se, Úe jste tak uÃinili!"
  577.   )
  578. )
  579. (set #INSTALLERVERSION "Je vyÚadovÁn Installer alespoΠve verzi 42.9.")
  580. (set #XPKMASTER_LIB    "NovÁ verze knihovny xpkmaster.library.")
  581. (set #INSTALL_LIB      "NovÁ verze podpÊrn× knihovny %s.")
  582. (set #WHAT_STUFF       "Kter× programy si pÒejete nainstalovat?")
  583. (set #WHAT_LANGUAGE    "Kter× lokalizaÃnÉ katalogy si pÒejete nainstalovat?")
  584. (set #WHAT_PROMPT      "Kter× ÃÁsti syst×mu Xpk si pÒejete nainstalovat?")
  585. (set #WHAT_LIBS        "Kter× podpÊrn× knihovny si pÒejete nainstalovat?")
  586. (set #WHAT_DOCS        "\n\n\n\n\nInstalovat dokumentaci?")
  587. (set #WHAT_PREFS       "\n\n\n\n\nInstalovat NastavenÉ pro Xpk?")
  588. (set #WHAT_PROCESSOR   "\n\n\n\n\nInstalovat verze knihoven pro MC68020?")
  589. (set #WHAT_DEVEL       "Kter× ÃÁsti adresÁÒe pro vÙvojÁÒe si pÒejete nainstalovat?")
  590. (set #WHAT_C            "Volba souborÊ pro VÁÓ kompilÁtor C.")
  591. (set #CRYPT_SOURCE     "\n\n\n\n\nInstalovat zdrojov× texty ÓifrovacÉch knihoven?")
  592. (set #STARTUP            "\n\n\n\n\nSpouÓtÅt XpkMasterPrefs automaticky pÒi startu.")
  593. (set #ASK_PATH
  594.   (cat "Volba cesty, kde by mÅl bÙt %s nainstalovÁn. AdresÁÒ "
  595.        "»%s« bude automaticky vytvoÒen, pokud neexistuje."
  596.   )
  597. )
  598. (set #ASK_PATH2     "Volba cesty kde by mÅl bÙt %s nainstalovÁn.")
  599. (set #WHAT_USER     "ãÁst pro uÚivatele")
  600. (set #WHAT_DEVELOP  "ãÁst pro vÙvojÁÒe")
  601. (set #WHAT_CRYPT    "ÓifrovacÉ knihovny")
  602. (set #WHAT_SOURCE   "zdrojov× texty a pÒÉklady")
  603. ))
  604.  
  605. ; ************************* global procedures ***************************
  606.  
  607. (procedure P_copylib lib pathadd path
  608.   (
  609.     (set #libr (cat "xpk" lib ".library"))
  610.     (copylib (prompt (#INSTALL_LIB libr))
  611.       (help @copylib-help)
  612.       (source (cat path "Libs" pathadd "/compressors/" libr))
  613.       (dest "LIBS:compressors/")
  614.       (confirm)
  615.     )
  616.   )
  617. )
  618.   
  619. ; ********************* xpk_User archive install *************************
  620.  
  621. (procedure P_install_user
  622.   (
  623.     (copylib (prompt #XPKMASTER_LIB)
  624.       (help @copylib-help)
  625.       (source (cat (if (< #OS_version 37) "Libs_1.3/" "Libs/") "xpkmaster.library"))
  626.       (dest "LIBS:")
  627.       (confirm)
  628.     )
  629.  
  630.     (set #p
  631.       (askoptions
  632.         (prompt #WHAT_LIBS)
  633.         (help @askoptions-help)
  634.         (choices "CBR0" "DLTA" "DUKE" "FAST" "FRLE" "HUFF" "IMPL" "NONE"
  635.           "NUKE" "RLEN" "SHRI" "SMPL" "HFMN" "MASH" "RAKE" "SQSH")
  636.         (default 4294967295)
  637.       )
  638.     )
  639.  
  640.     (set #q (if (IN #p 12 13 14 15)
  641.       (askbool
  642.         (prompt #WHAT_PROCESSOR)
  643.         (help @askbool-help)
  644.         (default 0)
  645.       ))
  646.     )
  647.  
  648.     (set #n 0)
  649.     (while (set #thisfile (select #n "CBR0" "DLTA" "DUKE" "FAST" "FRLE"
  650.       "HUFF" "IMPL" "NONE" "NUKE" "RLEN" "SHRI" "SMPL" ""))
  651.       (
  652.         (if (IN #p #n) (P_copylib #thisfile "" ""))
  653.         (set #n (+ #n 1))
  654.       )
  655.     )
  656.  
  657.     (set #i 0)
  658.     (while (set #thisfile (select #i "HFMN" "MASH" "RAKE" "SQSH" ""))
  659.       (
  660.         (if (IN #p (+ #n #i))
  661.           (P_copylib #thisfile (if #q "_68020+" "") ""))
  662.         (set #i (+ #i 1))
  663.       )
  664.     )
  665.  
  666.     (copyfiles
  667.       (source "C/")
  668.       (dest "C:")
  669.       (prompt #WHAT_STUFF)
  670.       (help @askoptions-help)
  671.       (choices "xDir" "xQuery" "xType" (if (>= #OS_version 37) "xPack" "xPK")
  672.       (if (>= #OS_version 37) "xBench") "xLoadSeg" "xScan" "xUP")
  673.       (confirm)
  674.     )
  675.  
  676.     (set #n (if (>= #OS_version 37)
  677.       (askbool
  678.         (prompt #WHAT_PREFS)
  679.         (help @askbool-help)
  680.         (default 0)
  681.       )
  682.     ))
  683.  
  684.     (if #n (
  685.       (copyfiles
  686.         (source "Prefs/")
  687.         (dest "SYS:Prefs/")
  688.         (choices "XpkMaster")
  689.         (infos)
  690.       )
  691.       (copyfiles (source "C/") (dest "C:") (choices "XpkMasterPrefs"))
  692.       (startup "XpkMasterPrefs" (prompt #STARTUP) (help @startup-help)
  693.         (command "Run >NIL: XpkMasterPrefs"))
  694.       (copyfiles (source "EnvArc/") (dest "ENVARC:") (prompt #PREFSFILE)
  695.       (help @copylib-help) (choices "xpkmaster.prefs") (confirm))
  696.     ))
  697.  
  698.     (if (>= #OS_version 37)(
  699.       (set #p
  700.         (askoptions
  701.           (prompt #WHAT_LANGUAGE)
  702.           (help @askoptions-help)
  703.           (choices
  704.         "dansk" "deutsch" "español" "français" "italiano"
  705.         "nederlands" "norsk" "polski" "português" "russian"
  706.         "srpski" "suomi" "Svenska" "ÃeÓtina"
  707.       )
  708.           (default (shiftleft 1 #catalog))
  709.         )
  710.       )
  711.  
  712.       (set #i 0)
  713.       (while (set #thisfile (select #i
  714.         "dansk" "deutsch" "español" "français" "italiano"
  715.         "nederlands" "norsk" "polski" "português" "russian"
  716.         "srpski" "suomi" "Svenska" "ÃeÓtina"
  717.       ""))
  718.       (
  719.         (set #thisfile (tackon "catalogs/" #thisfile))
  720.         (if (IN #p #i)(
  721.           (copyfiles (source #thisfile)
  722.             (dest (tackon "LOCALE:" #thisfile))
  723.             (pattern "xpkmaster.catalog")
  724.       )
  725.           (if #n (copyfiles (source #thisfile)
  726.             (dest (tackon "LOCALE:" #thisfile))
  727.             (pattern "xpkmasterprefs.catalog")
  728.       ))
  729.         ))
  730.         (set #i (+ #i 1))
  731.       ))
  732.     ))
  733.  
  734.     (copyfiles
  735.       (source "")
  736.       (dest @default-dest)
  737.       (prompt #WHAT_STUFF)
  738.       (help @askoptions-help)
  739.       (choices "XpkMaster.guide")
  740.       (infos)
  741.       (noposition)
  742.       (confirm)
  743.     )
  744.   )
  745. )
  746.  
  747. ; ********************* xpk_Develop archive install **********************
  748.  
  749. (procedure P_install_develop
  750.   (
  751.     (set #p
  752.       (askoptions
  753.         (prompt #WHAT_DEVOP)
  754.         (help @askoptions-help)
  755.         (choices #DEV_AUTODOCS #DEV_HOTHELP #DEV_FD #DEV_ASM #DEV_C)
  756.         (default 4294967295)
  757.       )
  758.     )
  759.  
  760.     (set #dir (if(exists "INCLUDE:" (NOREQ)) "INCLUDE:" @default-dest))
  761.  
  762.     (if (IN #p 0)
  763.       (
  764.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_AUTODOCS)) (help @askdir-help) (default #dir)))
  765.         (copyfiles (source (tackon #xpk_Develop "AutoDocs/")) (dest #dir) (all))
  766.       )
  767.     )
  768.     (if (IN #p 2)
  769.       (
  770.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_FD_FILES)) (help @askdir-help) (default #dir)))
  771.         (copyfiles (source (tackon #xpk_Develop "Include/FD/")) (dest #dir) (all))
  772.       )
  773.     )
  774.     (if (IN #p 3)
  775.       (
  776.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_ASM)) (help @askdir-help) (default #dir)))
  777.         (copyfiles (source (tackon #xpk_Develop "Include/ASM/")) (dest #dir) (all))
  778.       )
  779.     )
  780.     (if (IN #p 4)
  781.       (
  782.         (set #q
  783.           (askoptions
  784.             (prompt #WHAT_DEVEL)
  785.             (help @askoptions-help)
  786.             (choices #DEVC_PRAGMA #DEVC_GCC #DEVC_REDIRECT #DEVC_SAS
  787.               #DEVC_PROTO)
  788.             (default 1)
  789.           )
  790.         )
  791.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_C)) (help @askdir-help) (default #dir)))
  792.         (copyfiles (source (tackon #xpk_Develop "Include/C/clib/")) (dest (tackon #dir "clib")) (all))
  793.         (copyfiles (source (tackon #xpk_Develop "Include/C/xpk/")) (dest (tackon #dir "xpk")) (all))
  794.     (if (IN #q 0)
  795.       (copyfiles (source (tackon #xpk_Develop "Include/C/pragma/")) (dest (tackon #dir "pragma")) (all))
  796.     )
  797.     (if (IN #q 1)
  798.       (copyfiles (source (tackon #xpk_Develop "Include/C/inline/")) (dest (tackon #dir "inline")) (all))
  799.     )
  800.     (if (IN #q 2)
  801.       (copyfiles (source (tackon #xpk_Develop "Include/Old-C/libraries/")) (dest (tackon #dir "libraries")) (all))
  802.     )
  803.     (if (IN #q 3)
  804.       (copyfiles (source (tackon #xpk_Develop "Include/OLD-C/pragmas/")) (dest (tackon #dir "pragmas")) (all))
  805.     )
  806.     (if (IN #q 4)
  807.       (copyfiles (source (tackon #xpk_Develop "Include/C/proto/")) (dest (tackon #dir "proto")) (all))
  808.     )
  809.       )
  810.     )
  811.     (if (IN #p 1)
  812.       (
  813.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_HOTHELP)) (help @askdir-help) (default (if(exists "HOTHELP:" (NOREQ)) "HOTHELP:Projekte" @default-dest))))
  814.         (copyfiles (source (tackon #xpk_Develop "HotHelp/")) (dest #dir) (pattern "XPK#?"))
  815.       )
  816.     )
  817.   )
  818. )
  819.  
  820. ; ********************* xpk_Crypt archive install ************************
  821.  
  822. (procedure P_install_crypt
  823.   (
  824.     (set #i
  825.       (askoptions
  826.         (prompt #WHAT_LIBS)
  827.         (help @askoptions-help)
  828.         (choices "ENCO" "FEAL" "IDEA")
  829.         (default 4294967295)
  830.       )
  831.     )
  832.  
  833.     (set #n 0)
  834.     (while (set #thisfile (select #n "ENCO" "FEAL" "IDEA" ""))
  835.       (
  836.         (if (IN #i #n) (P_copylib #thisfile "" #xpk_Crypt))
  837.         (set #n (+ #n 1))
  838.       )
  839.     )
  840.  
  841.     (if (askbool (prompt #CRYPT_SOURCE) (help @askbool-help) (default 0))
  842.       (
  843.         (set #dir
  844.           (tackon
  845.             (askdir (prompt (#ASK_PATH #CRP_SOURCES "XpkSources/Crypt")) (help @askdir-help) (default @default-dest))
  846.             "XpkSources/Crypt"))
  847.         (if (NOT (exists #dir)) (makedir #dir (infos)))
  848.         (copyfiles (source (tackon #xpk_Crypt "source/")) (dest #dir) (all))
  849.       )
  850.     )
  851.   )
  852. )
  853.  
  854. ; ********************* xpk_Source archive install ***********************
  855.  
  856. (procedure P_install_source
  857.   (
  858.     (set #dir
  859.       (tackon
  860.         (askdir (prompt (#ASK_PATH #SRC_SRC_A_EXA "XpkSources")) (help @askdir-help) (default @default-dest))
  861.            "XpkSources"))
  862.         (if (NOT (exists #dir)) (makedir #dir (infos)))
  863.         (copyfiles (source #xpk_Source) (dest #dir) (all))
  864.   )
  865. )
  866.  
  867. ; ******************** here the stuff really starts **********************
  868.  
  869. (if (< @installer-version (+ (* 65536 42) 9))
  870.   (abort #INSTALLERVERSION)
  871. )
  872. ; we need at least version 42.9 of Installer, as some of it's functionality
  873. ; is used in the script
  874.  
  875. (set #xpk_Source  "/xpk_Source/")
  876. (set #xpk_Develop "/xpk_Develop/")
  877. (set #xpk_Crypt   "/xpk_Crypt/")
  878. (set #OS_version  (/ (getversion) 65536))
  879.  
  880. (message #GOINGIN)
  881. ; may be here comes an selection, where the decrunched archives are
  882.  
  883. (set #o
  884.   (askoptions
  885.     (prompt #WHAT_PROMPT)
  886.     (help @askoptions-help)
  887.     (choices #WHAT_USER
  888.       (if (exists #xpk_Develop) #WHAT_DEVELOP "")
  889.       (if (exists #xpk_Crypt)   #WHAT_CRYPT   "")
  890.       (if (exists #xpk_Source)  #WHAT_SOURCE  "")
  891.       (default 1)
  892.     )
  893.   )
  894. )
  895.  
  896. (if (IN #o 0) (P_install_user))
  897. (if (IN #o 1) (P_install_develop))
  898. (if (IN #o 2) (P_install_crypt))
  899. (if (IN #o 3) (P_install_source))
  900.  
  901. (exit (QUIET))
  902.  
  903.